home *** CD-ROM | disk | FTP | other *** search
/ Shareware Super Platinum 8 / Shareware Super Platinum 8.iso / mac / DATABASE / OBTN52.ZIP;1 / BUTTON.CH < prev    next >
Encoding:
Text File  |  1993-05-21  |  453 b   |  15 lines
  1. #ifndef _BUTTON_CH
  2. #define _BUTTON_CH
  3.  
  4. #xcommand @ <nRow>, <nCol> BUTTON <cPrompt> ;
  5.              [ <action:ACTION,EXECUTE,EXEC> <uAction> ] ;
  6.              [ WHEN <uWhen> ] ;
  7.              [ VALID <uValid> ] ;
  8.              [ COLOR <cColors> ] ;
  9.         => ;
  10.           AAdd( GetList, TButton():New( <nRow>, <nCol>, <cPrompt>,;
  11.                 <{uAction}>, <{uWhen}>, <{uValid}>, <cColors> ) ) ;;
  12.           ATail( GetList ):Display()
  13.  
  14. #endif
  15.